Celestin Apprentice 4/Apprentice-Release4.iso/Source Code/C/Applications/MacPerl 5.0.3/MacPerl Source ƒ/Perl5/lib/AnyDBM_File.pm

Perl POD Document | 1994-12-26 | 241 b | 10 lines | [TEXT/MPS ]

package AnyDBM_File;

@ISA = qw(NDBM_File DB_File GDBM_File SDBM_File ODBM_File) unless @ISA;

eval { require NDBM_File } ||
eval { require DB_File } ||
eval { require GDBM_File } ||
eval { require SDBM_File } ||
eval { require ODBM_File };